| Filename | (eval 36)[C:/tmp64ng/perl/lib/JSON/PP.pm:66] |
| Statements | Executed 162 statements in 0s |
| Eval Invoked At | C:/tmp64ng/perl/lib/JSON/PP.pm line 66 |
| Sibling evals | 1, 2, 3, 4, 5, 6, 7 |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 54 | 1 | 1 | 0s | 0s | JSON::PP::convert_blessed |
| 0 | 0 | 0 | 0s | 0s | JSON::PP::get_convert_blessed |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | |||||
| 2 | # spent 0s within JSON::PP::convert_blessed which was called 54 times, avg 0s/call:
# 54 times (0s+0s) by CPAN::Meta::Converter::_dclone at line 56 of CPAN/Meta/Converter.pm, avg 0s/call | ||||
| 3 | 54 | 0s | my $enable = defined $_[1] ? $_[1] : 1; | ||
| 4 | |||||
| 5 | 54 | 0s | if ($enable) { | ||
| 6 | $_[0]->{PROPS}->[P_CONVERT_BLESSED] = 1; | ||||
| 7 | } | ||||
| 8 | else { | ||||
| 9 | $_[0]->{PROPS}->[P_CONVERT_BLESSED] = 0; | ||||
| 10 | } | ||||
| 11 | |||||
| 12 | 54 | 0s | $_[0]; | ||
| 13 | } | ||||
| 14 | |||||
| 15 | sub get_convert_blessed { | ||||
| 16 | $_[0]->{PROPS}->[P_CONVERT_BLESSED] ? 1 : ''; | ||||
| 17 | } | ||||
| 18 | |||||
| 19 | ; |